home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / MPW Oberon 2.1168 / OInterfaces / OSAComp.mod < prev    next >
Encoding:
Text File  |  1995-08-07  |  1.0 KB  |  41 lines  |  [TEXT/MPS ]
  1. (*
  2.      File:        OSAComp.mod
  3.  
  4.      Contains:    AppleScript Components.Component Implementor's Interfaces.
  5.  
  6.      Version:    Technology:    AppleScript 1.1
  7.                  Package:    Universal Interfaces 2.0 in “MPW Latest” on ETO #17
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs.applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. *)
  19.  
  20. (*$TAGS-*)
  21. (*$CALLING PASCAL*)
  22. MODULE OSAComp;
  23.  
  24. IMPORT SYSTEM, Types, AppleEvents;
  25.  
  26. (* $PUSH*)
  27. (* $ALIGN MAC68K*)
  28. (* $LibExport+*)
  29.  
  30. PROCEDURE OSAGetStorageType*(scriptData: Types.Handle; VAR dscType: AppleEvents.DescType): Types.OSErr;
  31.     EXTERNAL PASCAL;
  32. PROCEDURE OSAAddStorageType*(scriptData: Types.Handle; dscType: AppleEvents.DescType): Types.OSErr;
  33.     EXTERNAL PASCAL;
  34. PROCEDURE OSARemoveStorageType*(scriptData: Types.Handle): Types.OSErr;
  35.     EXTERNAL PASCAL;
  36.  
  37. (* $ALIGN RESET*)
  38. (* $POP*)
  39.  
  40.  END OSAComp.
  41.